;--------------------------------------
;
; oncur.asm
;
; turns on the cursor
;

;--------------------------------------
;
; include defs, prototypes and macros
;

include tab6.inc

;--------------------------------------
;
; begin code segment
;


    .Code

;--------------------------------------
;
; onCur(void)
;  
;

onCur PROC Pascal PUBLIC
    mov    ah,GET_CURSOR_CONFIG   ; get cursor congiguration
    int    10h                    ; via BIOS
    and    ch,0dfh                ; turn off bit 5
    mov    ah,SET_CURSOR_SHAPE    ; set cursor shape
    int    10h                    ; via BIOS
    ret                           ; return to caller
onCur ENDP

;
; end of onCur procedure
;

    END
;
;--------------------------------------
